برترین سورس های ویژال بیسیک 6
آموزشی و همه چی
22 خرداد 1389برچسب:, :: 5:14 بعد از ظهر :: نويسنده : حسام بخشعلی زاده

شنیدن صدای بوق سیستم

برای این کار لازمه API زیر را بار گذاری کنید

Private Declare Function MessageBeep Lib "user32" (ByVal wType As Long) As Long

و دستور زیر را برای یه دکمه بنویسید...

    Dim Beeper As Variant
    Beeper = MessageBeep(-1)

به همین سادگی آره

صفحه قبل 1 صفحه بعد
موضوعات
پيوندها


ورود اعضا:

<-PollName->

<-PollItems->

خبرنامه وب سایت:





آمار وب سایت:
 

بازدید امروز : 27
بازدید دیروز : 0
بازدید هفته : 27
بازدید ماه : 32
بازدید کل : 224563
تعداد مطالب : 86
تعداد نظرات : 43
تعداد آنلاین : 1